home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / programming / emacs-complete / fsf / emacs / info / forms < prev    next >
Encoding:
GNU Info File  |  1994-08-02  |  30.8 KB  |  818 lines
  1. This is Info file ../info/forms, produced by Makeinfo-1.54 from the
  2. input file forms.texi.
  3.  
  4.    This file documents Forms mode, a form-editing major mode for GNU
  5. Emacs.
  6.  
  7.    Permission is granted to make and distribute verbatim copies of this
  8. manual provided the copyright notice and this permission notice are
  9. preserved on all copies.
  10.  
  11. 
  12. File: forms,  Node: Top,  Next: Forms Example,  Prev: (DIR),  Up: (DIR)
  13.  
  14. Forms Mode
  15. **********
  16.  
  17.    Forms mode is an Emacs major mode for working with simple textual
  18. data bases in a forms-oriented manner.  In Forms mode, the information
  19. in these files is presented in an Emacs window in a user-defined format,
  20. one record at a time.  The user can view records or modify their
  21. contents.
  22.  
  23.    Forms mode is not a simple major mode, but requires two files to do
  24. its job: a control file and a data file.  The data file holds the
  25. actual data to be presented.  The control file describes how to present
  26. it.
  27.  
  28. * Menu:
  29.  
  30. * Forms Example::               An example: editing the password data base.
  31. * Entering and Exiting Forms Mode::
  32.                                 How to visit a file in Forms mode.
  33. * Forms Commands::              Special commands to use while in Forms mode.
  34. * Data File Format::            How to format the data file.
  35. * Control File Format::         How to control forms mode.
  36. * Format Description::          How to define the forms layout.
  37. * Modifying Forms Contents::    How to modify.
  38. * Miscellaneous::               Forms mode messages and other remarks.
  39. * Error Messages::              List of error messages forms mode can produce.
  40. * Long Example::                A more complex control file example.
  41. * Credits::                     Thanks everyone.
  42. * Index::                       Index to this manual.
  43.  
  44. 
  45. File: forms,  Node: Forms Example,  Next: Entering and Exiting Forms Mode,  Prev: Top,  Up: Top
  46.  
  47. Forms Example
  48. *************
  49.  
  50.    Let's illustrate Forms mode with an example.  Suppose you are
  51. looking at the `/etc/passwd' file, and the screen looks like this:
  52.  
  53.      ====== /etc/passwd ======
  54.      
  55.      User : root   Uid: 0   Gid: 1
  56.      
  57.      Name : Super User
  58.      
  59.      Home : /
  60.      
  61.      Shell: /bin/sh
  62.  
  63.    As you can see, the familiar fields from the entry for the super user
  64. are all there, but instead of being colon-separated on one single line,
  65. they make up a forms.
  66.  
  67.    The contents of the forms consists of the contents of the fields of
  68. the record (e.g., `root', `0', `1', `Super User') interspersed with
  69. normal text (e.g `User : ', `Uid: ').
  70.  
  71.    If you modify the contents of the fields, Forms mode will analyze
  72. your changes and update the file appropriately.  You cannot modify the
  73. interspersed explanatory text (unless you go to some trouble about it),
  74. because that is marked read-only (*note Text Properties: (elisp)Text
  75. Properties.).
  76.  
  77.    The Forms mode control file specifies the relationship between the
  78. format of `/etc/passwd' and what appears on the screen in Forms mode.
  79. *Note Control File Format::.
  80.  
  81. 
  82. File: forms,  Node: Entering and Exiting Forms Mode,  Next: Forms Commands,  Prev: Forms Example,  Up: Top
  83.  
  84. Entering and Exiting Forms Mode
  85. *******************************
  86.  
  87. `M-x forms-find-file RET CONTROL-FILE RET'
  88.      Visit a database using Forms mode.  Specify the name of the
  89.      *control file*, not the data file!
  90.  
  91. `M-x forms-find-file-other-window RET CONTROL-FILE RET'
  92.      Similar, but displays the file in another window.
  93.  
  94.    The command `forms-find-file' evaluates the file CONTROL-FILE, and
  95. also visits it in Forms mode.  What you see in its buffer is not the
  96. contents of this file, but rather a single record of the corresponding
  97. data file that is visited in its own buffer.  So there are two buffers
  98. involved in Forms mode: the "forms buffer" that is initially used to
  99. visit the control file and that shows the records being browsed, and
  100. the "data buffer" that holds the data file being visited.  The latter
  101. buffer is normally not visible.
  102.  
  103.    Initially, the first record is displayed in the forms buffer.  The
  104. mode line displays the major mode name `Forms', followed by the minor
  105. mode `View' if the data base is read-only.  The number of the current
  106. record (N) and the total number of records in the file(T) are shown in
  107. the mode line as `N/T'.  For example:
  108.  
  109.      --%%-Emacs: passwd-demo          (Forms View 1/54)----All-------
  110.  
  111.    If the buffer is not read-only, you may change the buffer to modify
  112. the fields in the record.  When you move to a different record, the
  113. contents of the buffer are parsed using the specifications in
  114. `forms-format-list', and the data file is updated.  If the record has
  115. fields that aren't included in the display, they are not changed.
  116.  
  117.    Entering Forms mode runs the normal hook `forms-mode-hooks' to
  118. perform user-defined customization.
  119.  
  120.    To save any modified data, you can use `C-x C-s'
  121. (`forms-save-buffer').  This does not save the forms buffer (which would
  122. be rather useless), but instead saves the buffer visiting the data file.
  123.  
  124.    To terminate Forms mode, you can use `C-x C-s' (`forms-save-buffer')
  125. and then kill the forms buffer.  However, the data buffer will still
  126. remain.  If this is not desired, you have to kill this buffer too.
  127.  
  128. 
  129. File: forms,  Node: Forms Commands,  Next: Data File Format,  Prev: Entering and Exiting Forms Mode,  Up: Top
  130.  
  131. Forms Commands
  132. **************
  133.  
  134.    The commands of Forms mode belong to the `C-c' prefix, with one
  135. exception: TAB, which moves to the next field.  Forms mode uses
  136. different key maps for normal mode and read-only mode.  In read-only
  137. Forms mode, you can access most of the commands without the `C-c'
  138. prefix, but you must type ordinary letters instead of control
  139. characters; for example, type `n' instead of `C-c C-n'.
  140.  
  141. `C-c C-n'
  142.      Show the next record (`forms-next-record').  With a numeric
  143.      argument N, show the Nth next record.
  144.  
  145. `C-c C-p'
  146.      Show the previous record (`forms-prev-record').  With a numeric
  147.      argument N, show the Nth previous record.
  148.  
  149. `C-c C-l'
  150.      Jump to a record by number (`forms-jump-record').   Specify the
  151.      record number with a numeric argument.
  152.  
  153. `C-c <'
  154.      Jump to the first record (`forms-first-record').
  155.  
  156. `C-c >'
  157.      Jump to the last record (`forms-last-record').  This command also
  158.      recalculates the number of records in the data file.
  159.  
  160. `TAB'
  161. `C-c TAB'
  162.      Jump to the next field in the current record (`forms-next-field').
  163.      With a numeric argument N, jump forward N fields.  If this command
  164.      would move past the last field, it wraps around to the first field.
  165.  
  166. `C-c C-q'
  167.      Toggles read-only mode (`forms-toggle-read-only').  In read-only
  168.      Forms mode, you cannot edit the fields; most Forms mode commands
  169.      can be accessed without the prefix `C-c' if you use the normal
  170.      letter instead (for example, type `n' instead of `C-c C-n').  In
  171.      edit mode, you can edit the fields and thus change the contents of
  172.      the data base; you must begin Forms mode commands with `C-c'.
  173.      Switching to edit mode is allowed only if you have write access to
  174.      the data file.
  175.  
  176. `C-c C-o'
  177.      Create a new record and insert it before the current record
  178.      (`forms-insert-record').  It starts out with empty (or default)
  179.      contents for its fields; you can then edit the fields.  With a
  180.      numeric argument, the new record is created *after* the current
  181.      one.  See also `forms-modified-record-filter' in *Note Modifying
  182.      Forms Contents::.
  183.  
  184. `C-c C-k'
  185.      Delete the current record (`forms-delete-record').  You are
  186.      prompted for confirmation before the record is deleted unless a
  187.      numeric argument has been provided.
  188.  
  189. `C-c C-s REGEXP RET'
  190.      Search for REGEXP in all records following this one
  191.      (`forms-search').  If found, this record is shown.  If you give an
  192.      empty argument, the previous regexp is used again.
  193.  
  194. `M-x forms-prev-field'
  195.      Similar to `forms-next-field' but moves backwards.
  196.  
  197. `M-x forms-save-buffer'
  198. `C-x C-s'
  199.      Forms mode replacement for `save-buffer'. When executed in the
  200.      forms buffer it will save the contents of the (modified) data
  201.      buffer instead. In Forms mode this function will be bound to `C-x
  202.      C-s'.
  203.  
  204.    In addition the command `M-x revert-buffer' is useful in Forms mode
  205. just as in other modes.
  206.  
  207.    The following function key definitions are set up in Forms mode
  208. (whether read-only or not):
  209.  
  210. `next'
  211.      forms-next-record
  212.  
  213. `prior'
  214.      forms-prev-record
  215.  
  216. `begin'
  217.      forms-first-record
  218.  
  219. `end'
  220.      forms-last-record
  221.  
  222. `S-Tab'
  223.      forms-prev-field
  224.  
  225. 
  226. File: forms,  Node: Data File Format,  Next: Control File Format,  Prev: Forms Commands,  Up: Top
  227.  
  228. Data File Format
  229. ****************
  230.  
  231.    Files for use with Forms mode are very simple--each "record"
  232. (usually one line) forms the contents of one form.  Each record consists
  233. of a number of "fields", which are separated by the value of the string
  234. `forms-field-sep', which is `"\t"' (a Tab) by default.
  235.  
  236.    If the format of the data file is not suitable enough you can define
  237. the filter functions `forms-read-file-filter' and
  238. `forms-write-file-filter'. `forms-read-file-filter' is called when the
  239. data file is read from disk into the data buffer. It operates on the
  240. data buffer, ignoring read-only protections. When the data file is
  241. saved to disk `forms-write-file-filter' is called to cancel the effects
  242. of `forms-read-file-filter'. After being saved,
  243. `forms-read-file-filter' is called again to prepare the data buffer for
  244. further processing.
  245.  
  246.    Fields may contain text which shows up in the forms in multiple
  247. lines.  These lines are separated in the field using a "pseudo-newline"
  248. character which is defined by the value of the string
  249. `forms-multi-line'.  Its default value is `"\^k"' (a Control-K
  250. character).  If it is set to `nil', multiple line fields are prohibited.
  251.  
  252.    If the data file does not exist, it is automatically created.
  253.  
  254. 
  255. File: forms,  Node: Control File Format,  Next: Format Description,  Prev: Data File Format,  Up: Top
  256.  
  257. Control File Format
  258. *******************
  259.  
  260.    The Forms mode "control file" serves two purposes.  First, it names
  261. the data file to use, and defines its format and properties.  Second,
  262. the Emacs buffer it occupies is used by Forms mode to display the forms.
  263.  
  264.    The contents of the control file are evaluated as a Lisp program.  It
  265. should set the following Lisp variables to suitable values:
  266.  
  267. `forms-file'
  268.      This variable specifies the name of the data file.  Example:
  269.  
  270.           (setq forms-file "my/data-file")
  271.  
  272.      If the control file doesn't set `forms-file', Forms mode reports
  273.      an error.
  274.  
  275. `forms-format-list'
  276.      This variable describes the way the fields of the record are
  277.      formatted on the screen.  For details, see *Note Format
  278.      Description::.
  279.  
  280. `forms-number-of-fields'
  281.      This variable holds the number of fields in each record of the data
  282.      file.  Example:
  283.  
  284.           (setq forms-number-of-fields 10)
  285.  
  286.    If the control file does not set `forms-format-list' a default
  287. format is used.  In this situation, Forms mode will deduce the number of
  288. fields from the data file providing this file exists and
  289. `forms-number-of-records' has not been set in the control file.
  290.  
  291.    The control file can optionally set the following additional Forms
  292. mode variables.  Most of them have default values that are good for most
  293. applications.
  294.  
  295. `forms-field-sep'
  296.      This variable may be used to designate the string which separates
  297.      the fields in the records of the data file.  If not set, it
  298.      defaults to the string `"\t"' (a Tab character).  Example:
  299.  
  300.           (setq forms-field-sep "\t")
  301.  
  302. `forms-read-only'
  303.      If the value is non-`nil', the data file is treated read-only.
  304.      (Forms mode also treats the data file as read-only if you don't
  305.      have access to write it.)  Example:
  306.  
  307.           (set forms-read-only t)
  308.  
  309. `forms-multi-line'
  310.      This variable specifies the "pseudo newline" separator that allows
  311.      multi-line fields.  This separator goes between the "lines" within
  312.      a field--thus, the field doesn't really contain multiple lines,
  313.      but it appears that way when displayed in Forms mode.  If the
  314.      value is `nil', multi-line text fields are prohibited.  The pseudo
  315.      newline must not be a character contained in `forms-field-sep'.
  316.  
  317.      The default value is `"\^k"', the character Control-K.  Example:
  318.  
  319.           (setq forms-multi-line "\^k")
  320.  
  321. `forms-read-file-filter'
  322.      This variable holds the name of a function to be called after the
  323.      data file has been read in. This can be used to transform the
  324.      contents of the data file into a format more suitable for forms
  325.      processing.  If it is `nil', no function is called.
  326.  
  327. `forms-write-file-filter'
  328.      This variable holds the name of a function to be called before
  329.      writing out the contents of the data file.  This can be used to
  330.      undo the effects of `forms-read-file-filter'.  If it is `nil', no
  331.      function is called.
  332.  
  333. `forms-new-record-filter'
  334.      This variable holds a function to be called whenever a new record
  335.      is created to supply default values for fields.  If it is `nil',
  336.      no function is called.  *Note Modifying Forms Contents::, for
  337.      details.
  338.  
  339. `forms-modified-record-filter'
  340.      This variable holds a function to be called whenever a record is
  341.      modified, just before updating the Forms data file.  If it is
  342.      `nil', no function is called.  *Note Modifying Forms Contents::,
  343.      for details.
  344.  
  345. 
  346. File: forms,  Node: Format Description,  Next: Modifying Forms Contents,  Prev: Control File Format,  Up: Top
  347.  
  348. The Format Description
  349. **********************
  350.  
  351.    The variable `forms-format-list' specifies the format of the data in
  352. the data file, and how to convert the data for display in Forms mode.
  353. Its value must be a list of Forms mode "formatting elements", each of
  354. which can be a string, a number, a Lisp list, or a Lisp symbol that
  355. evaluates to one of those.  The formatting elements are processed in the
  356. order they appear in the list.
  357.  
  358. STRING
  359.      A string formatting element is inserted in the forms "as is," as
  360.      text that the user cannot alter.
  361.  
  362. NUMBER
  363.      A number element selects a field of the record.  The contents of
  364.      this field are inserted in the display at this point.  Field
  365.      numbers count starting from 1 (one).
  366.  
  367. LIST
  368.      A formatting element that is a list specifies a function call.
  369.      This function is called every time a record is displayed, and its
  370.      result, which must be a string, is inserted in the display text.
  371.      The function should do nothing but returning a string.
  372.  
  373.      The function you call can access the fields of the record as a
  374.      list in the variable `forms-fields'.
  375.  
  376. SYMBOL
  377.      A symbol used as a formatting element should evaluate to a string,
  378.      number, or list; the value is interpreted as a formatting element,
  379.      as described above.
  380.  
  381.    If a record does not contain the number of fields as specified in
  382. `forms-number-of-fields', a warning message will be printed.  Excess
  383. fields are ignored, missing fields are set to empty.
  384.  
  385.    The control file which displays `/etc/passwd' file as demonstrated
  386. in the beginning of this manual might look as follows:
  387.  
  388.      ;; This demo visits `/etc/passwd'.
  389.      
  390.      (setq forms-file "/etc/passwd")
  391.      (setq forms-number-of-fields 7)
  392.      (setq forms-read-only t)                 ; to make sure
  393.      (setq forms-field-sep ":")
  394.      ;; Don't allow multi-line fields.
  395.      (setq forms-multi-line nil)
  396.      
  397.      (setq forms-format-list
  398.            (list
  399.             "====== /etc/passwd ======\n\n"
  400.             "User : "    1
  401.             "   Uid: "   3
  402.             "   Gid: "   4
  403.             "\n\n"
  404.             "Name : "    5
  405.             "\n\n"
  406.             "Home : "    6
  407.             "\n\n"
  408.             "Shell: "    7
  409.             "\n"))
  410.  
  411.    When you construct the value of  `forms-format-list', you should
  412. usually either quote the whole value, like this,
  413.  
  414.      (setq forms-format-list
  415.           '(
  416.             "====== " forms-file " ======\n\n"
  417.             "User : "    1
  418.             (make-string 20 ?-)
  419.             ...
  420.            ))
  421.  
  422. or quote the elements which are lists, like this:
  423.  
  424.      (setq forms-format-list
  425.            (list
  426.             "====== " forms-file " ======\n\n"
  427.             "User : "    1
  428.             '(make-string 20 ?-)
  429.             ...
  430.            ))
  431.  
  432.    Forms mode validates the contents of `forms-format-list' when you
  433. visit a database.  If there are errors, processing is aborted with an
  434. error message which includes a descriptive text.  *Note Error
  435. Messages::, for a detailed list of error messages.
  436.  
  437.    If no `forms-format-list' is specified, Forms mode will supply a
  438. default format list.  This list contains the name of the file being
  439. visited, and a simple label for each field indicating the field number.
  440.  
  441. 
  442. File: forms,  Node: Modifying Forms Contents,  Next: Miscellaneous,  Prev: Format Description,  Up: Top
  443.  
  444. Modifying The Forms Contents
  445. ****************************
  446.  
  447.    If `forms-read-only' is `nil', the user can modify the fields and
  448. records of the database.
  449.  
  450.    All normal editing commands are available for editing the contents
  451. of the displayed record.  You cannot delete or modify the fixed,
  452. explanatory text that comes from string formatting elements, but you
  453. can modify the actual field contents.
  454.  
  455.    If the variable `forms-modified-record-filter' is non-`nil', it is
  456. called as a function before the new data is written to the data file.
  457. The function receives one argument, a vector that contains the contents
  458. of the fields of the record.
  459.  
  460.    The function can refer to fields with `aref' and modify them with
  461. `aset'.  The first field has number 1 (one); thus, element 0 of the
  462. vector is not used.  The function should return the same vector it was
  463. passed; the (possibly modified) contents of the vector determine what is
  464. actually written in the file.  Here is an example:
  465.  
  466.      (defun my-modified-record-filter (record)
  467.        ;; Modify second field.
  468.        (aset record 2 (current-time-string))
  469.        ;; Return the field vector.
  470.        record)
  471.      
  472.      (setq forms-modified-record-filter 'my-modified-record-filter)
  473.  
  474.    If the variable `forms-new-record-filter' is non-`nil', its value is
  475. a function to be called to fill in default values for the fields of a
  476. new record.  The function is passed a vector of empty strings, one for
  477. each field; it should return the same vector, with the desired field
  478. values stored in it.  Fields are numbered starting from 1 (one).
  479. Example:
  480.  
  481.      (defun my-new-record-filter (fields)
  482.        (aset fields 5 (login-name))
  483.        (aset fields 1 (current-time-string))
  484.        fields)
  485.      
  486.      (setq forms-new-record-filter 'my-new-record-filter)
  487.  
  488. 
  489. File: forms,  Node: Miscellaneous,  Next: Error Messages,  Prev: Modifying Forms Contents,  Up: Top
  490.  
  491. Miscellaneous
  492. *************
  493.  
  494.    The global variable `forms-version' holds the version information of
  495. the Forms mode software.
  496.  
  497.    It is very convenient to use symbolic names for the fields in a
  498. record.  The function `forms-enumerate' provides an elegant means to
  499. define a series of variables whose values are consecutive integers.  The
  500. function returns the highest number used, so it can be used to set
  501. `forms-number-of-fields' also.  For example:
  502.  
  503.      (setq forms-number-of-fields
  504.            (forms-enumerate
  505.             '(field1 field2 field3 ...)))
  506.  
  507.    This sets `field1' to 1, `field2' to 2, and so on.
  508.  
  509.    Care has been taken to keep the Forms mode variables buffer-local,
  510. so it is possible to visit multiple files in Forms mode simultaneously,
  511. even if they have different properties.
  512.  
  513.    If you have visited the control file in normal fashion with
  514. `find-file' or a like command, you can switch to Forms mode with the
  515. command `M-x forms-mode'.  If you put `-*- forms -*-' in the first line
  516. of the control file, then visiting it enables Forms mode automatically.
  517. But this makes it hard to edit the control file itself, so you'd
  518. better think twice before using this.
  519.  
  520.    The default format for the data file, using `"\t"' to separate
  521. fields and `"\^k"' to separate lines within a field, matches the file
  522. format of some popular database programs, such as FileMaker.  So
  523. `forms-mode' can decrease the need to use proprietary software.
  524.  
  525. 
  526. File: forms,  Node: Error Messages,  Next: Long Example,  Prev: Miscellaneous,  Up: Top
  527.  
  528. Error Messages
  529. **************
  530.  
  531.    This section describes all error messages which can be generated by
  532. forms mode.  Error messages that result from parsing the control file
  533. all start with the text `Forms control file error'.  Messages generated
  534. while analyzing the definition of `forms-format-list' start with `Forms
  535. format error'.
  536.  
  537. `Forms control file error: 'forms-file' has not been set'
  538.      The variable `forms-file' was not set by the control file.
  539.  
  540. `Forms control file error: 'forms-number-of-fields' has not been set'
  541.      The variable `forms-number-of-fields' was not set by the control
  542.      file.
  543.  
  544. `Forms control file error: 'forms-number-of-fields' must be a number > 0'
  545.      The variable `forms-number-of-fields' did not contain a positive
  546.      number.
  547.  
  548. `Forms control file error: 'forms-field-sep' is not a string'
  549. `Forms control file error: 'forms-multi-line' must be nil or a one-character string'
  550.      The variable `forms-multi-line' was set to something other than
  551.      `nil' or a single-character string.
  552.  
  553. `Forms control file error: 'forms-multi-line' is equal to 'forms-field-sep''
  554.      The variable `forms-multi-line' may not be equal to
  555.      `forms-field-sep' for this would make it impossible to distinguish
  556.      fields and the lines in the fields.
  557.  
  558. `Forms control file error: 'forms-new-record-filter' is not a function'
  559. `Forms control file error: 'forms-modified-record-filter' is not a function'
  560.      The variable has been set to something else than a function.
  561.  
  562. `Forms control file error: 'forms-format-list' is not a list'
  563.      The variable `forms-format-list' was not set to a Lisp list by the
  564.      control file.
  565.  
  566. `Forms format error: field number XX out of range 1..NN'
  567.      A field number was supplied in `forms-format-list' with a value of
  568.      XX, which was not greater than zero and smaller than or equal to
  569.      the number of fields in the forms, NN.
  570.  
  571. `Forms format error:  not a function FUN'
  572.      The first element of a list which is an element of
  573.      `forms-format-list' was not a valid Lisp function.
  574.  
  575. `Forms format error:  invalid element XX'
  576.      A list element was supplied in `forms-format-list' which was not a
  577.      string, number or list.
  578.  
  579. `Warning: this record has XX fields instead of YY'
  580.      The number of fields in this record in the data file did not match
  581.      `forms-number-of-fields'.  Missing fields will be made empty.
  582.  
  583. `Multi-line fields in this record - update refused!'
  584.      The current record contains newline characters, hence can not be
  585.      written back to the data file, for it would corrupt it.  Probably
  586.      you inserted a newline in a field, while `forms-multi-line' was
  587.      `nil'.
  588.  
  589. `Field separator occurs in record - update refused!'
  590.      The current record contains the field separator string inside one
  591.      of the fields. It can not be written back to the data file, for it
  592.      would corrupt it. Probably you inserted the field separator string
  593.      in a field.
  594.  
  595. `Record number XX out of range 1..YY'
  596.      A jump was made to non-existing record XX.  YY denotes the number
  597.      of records in the file.
  598.  
  599. `Stuck at record XX'
  600.      An internal error prevented a specific record from being retrieved.
  601.  
  602. `No write access to `"'FILE`"''
  603.      An attempt was made to enable edit mode on a file that has been
  604.      write protected.
  605.  
  606. ``"'REGEXP`"' not found'
  607.      The REGEXP could not be found in the data file, starting at the
  608.      current record location.
  609.  
  610. `Warning: number of records changed to NN'
  611.      Forms mode's idea of the number of records has been adjusted to the
  612.      number of records actually present in the data file.
  613.  
  614. `Problem saving buffers?'
  615.      An error occurred while saving the data file buffer. Most likely,
  616.      Emacs did ask to confirm deleting the buffer because it had been
  617.      modified, and you said `no'.
  618.  
  619. 
  620. File: forms,  Node: Long Example,  Next: Credits,  Prev: Error Messages,  Up: Top
  621.  
  622. Long Example
  623. ************
  624.  
  625.    The following example exploits most of the features of Forms mode.
  626. This example is included in the distribution as file `forms-d2.el'.
  627.  
  628.      ;; demo2 -- demo forms-mode    -*- emacs-lisp -*-
  629.      
  630.      ;; SCCS Status     : demo2    1.1.2
  631.      ;; Author          : Johan Vromans
  632.      ;; Created On      : 1989
  633.      ;; Last Modified By: Johan Vromans
  634.      ;; Last Modified On: Mon Jul  1 13:56:31 1991
  635.      ;; Update Count    : 2
  636.      ;; Status          : OK
  637.      ;;
  638.      ;; This sample forms exploit most of the features of forms mode.
  639.      
  640.      ;; Set the name of the data file.
  641.      (setq forms-file "forms-d2.dat")
  642.      
  643.      ;; Use `forms-enumerate' to set field names and number thereof.
  644.      (setq forms-number-of-fields
  645.            (forms-enumerate
  646.             '(arch-newsgroup            ; 1
  647.           arch-volume            ; 2
  648.           arch-issue            ; and ...
  649.           arch-article            ; ... so
  650.           arch-shortname            ; ... ... on
  651.           arch-parts
  652.           arch-from
  653.           arch-longname
  654.           arch-keywords
  655.           arch-date
  656.           arch-remarks)))
  657.      
  658.      ;; The following functions are used by this form for layout purposes.
  659.      ;;
  660.      (defun arch-tocol (target &optional fill)
  661.        "Produces a string to skip to column TARGET.
  662.      Prepends newline if needed.
  663.      The optional FILL should be a character, used to fill to the column."
  664.        (if (null fill)
  665.            (setq fill ? ))
  666.        (if (< target (current-column))
  667.            (concat "\n" (make-string target fill))
  668.          (make-string (- target (current-column)) fill)))
  669.      ;;
  670.      (defun arch-rj (target field &optional fill)
  671.        "Produces a string to skip to column TARGET\
  672.       minus the width of field FIELD.
  673.      Prepends newline if needed.
  674.      The optional FILL should be a character,
  675.      used to fill to the column."
  676.        (arch-tocol (- target (length (nth field forms-fields))) fill))
  677.      
  678.      ;; Record filters.
  679.      ;;
  680.      (defun new-record-filter (the-record)
  681.        "Form a new record with some defaults."
  682.        (aset the-record arch-from (user-full-name))
  683.        (aset the-record arch-date (current-time-string))
  684.        the-record)                ; return it
  685.      (setq forms-new-record-filter 'new-record-filter)
  686.      
  687.      ;; The format list.
  688.      (setq forms-format-list
  689.           (list
  690.             "====== Public Domain Software Archive ======\n\n"
  691.             arch-shortname
  692.             " - "            arch-longname
  693.             "\n\n"
  694.             "Article: "        arch-newsgroup
  695.             "/"            arch-article
  696.             " "
  697.             '(arch-tocol 40)
  698.             "Issue: "        arch-issue
  699.             " "
  700.             '(arch-rj 73 10)
  701.             "Date: "            arch-date
  702.             "\n\n"
  703.             "Submitted by: "        arch-from
  704.             "\n"
  705.             '(arch-tocol 79 ?-)
  706.             "\n"
  707.             "Keywords: "        arch-keywords
  708.             "\n\n"
  709.             "Parts: "        arch-parts
  710.             "\n\n====== Remarks ======\n\n"
  711.             arch-remarks
  712.           ))
  713.      
  714.      ;; That's all, folks!
  715.  
  716. 
  717. File: forms,  Node: Credits,  Next: Index,  Prev: Long Example,  Up: Top
  718.  
  719. Credits
  720. *******
  721.  
  722.    Bug fixes and other useful suggestions were supplied by Harald
  723. Hanche-Olsen (`hanche@imf.unit.no'), `cwitty@portia.stanford.edu',
  724. Jonathan I. Kamens, Per Cederqvist  (`ceder@signum.se'), Michael Lipka
  725. (`lipka@lip.hanse.de'), Andy Piper (`ajp@eng.cam.ac.uk'), Ignatios
  726. Souvatzis and Richard Stallman (`rms@gnu.ai.mit.edu').
  727.  
  728.    This documentation was slightly inspired by the documentation of
  729. "rolo mode" by Paul Davis at Schlumberger Cambridge Research
  730. (`davis%scrsu1%sdr.slb.com@relay.cs.net').
  731.  
  732.    None of this would have been possible without GNU Emacs of the Free
  733. Software Foundation.  Thanks, Richard!
  734.  
  735. 
  736. File: forms,  Node: Index,  Prev: Credits,  Up: Top
  737.  
  738. Index
  739. *****
  740.  
  741. * Menu:
  742.  
  743. * TAB:                                  Forms Commands.
  744. * begin:                                Forms Commands.
  745. * C-c <:                                Forms Commands.
  746. * C-c >:                                Forms Commands.
  747. * C-c TAB:                              Forms Commands.
  748. * C-c C-k:                              Forms Commands.
  749. * C-c C-l:                              Forms Commands.
  750. * C-c C-n:                              Forms Commands.
  751. * C-c C-o:                              Forms Commands.
  752. * C-c C-p:                              Forms Commands.
  753. * C-c C-q:                              Forms Commands.
  754. * C-c C-s REGEXP RET:                   Forms Commands.
  755. * C-x C-s:                              Forms Commands.
  756. * control file:                         Control File Format.
  757. * end:                                  Forms Commands.
  758. * field:                                Data File Format.
  759. * forms-delete-record:                  Forms Commands.
  760. * forms-enumerate:                      Miscellaneous.
  761. * forms-field-sep:                      Control File Format.
  762. * forms-field-sep:                      Data File Format.
  763. * forms-fields:                         Format Description.
  764. * forms-file:                           Control File Format.
  765. * forms-find-file:                      Entering and Exiting Forms Mode.
  766. * forms-find-file-other-window:         Entering and Exiting Forms Mode.
  767. * forms-first-record:                   Forms Commands.
  768. * forms-format-list:                    Control File Format.
  769. * forms-format-list:                    Format Description.
  770. * forms-insert-record:                  Forms Commands.
  771. * forms-jump-record:                    Forms Commands.
  772. * forms-last-record:                    Forms Commands.
  773. * forms-mode:                           Miscellaneous.
  774. * forms-mode-hooks:                     Entering and Exiting Forms Mode.
  775. * forms-modified-record-filter:         Control File Format.
  776. * forms-multi-line:                     Data File Format.
  777. * forms-multi-line:                     Control File Format.
  778. * forms-new-record-filter:              Control File Format.
  779. * forms-next-field:                     Forms Commands.
  780. * forms-next-record:                    Forms Commands.
  781. * forms-number-of-fields:               Control File Format.
  782. * forms-prev-field:                     Forms Commands.
  783. * forms-prev-field:                     Forms Commands.
  784. * forms-prev-record:                    Forms Commands.
  785. * forms-read-file-filter:               Data File Format.
  786. * forms-read-file-filter:               Control File Format.
  787. * forms-read-only:                      Control File Format.
  788. * forms-save-buffer:                    Forms Commands.
  789. * forms-search:                         Forms Commands.
  790. * forms-toggle-read-only:               Forms Commands.
  791. * forms-version:                        Miscellaneous.
  792. * forms-write-file-filter:              Data File Format.
  793. * forms-write-file-filter:              Control File Format.
  794. * next:                                 Forms Commands.
  795. * prior:                                Forms Commands.
  796. * pseudo-newline:                       Data File Format.
  797. * record:                               Data File Format.
  798. * S-Tab:                                Forms Commands.
  799.  
  800.  
  801. 
  802. Tag Table:
  803. Node: Top335
  804. Node: Forms Example1755
  805. Node: Entering and Exiting Forms Mode2976
  806. Node: Forms Commands5174
  807. Node: Data File Format8477
  808. Node: Control File Format9816
  809. Node: Format Description13371
  810. Node: Modifying Forms Contents16713
  811. Node: Miscellaneous18600
  812. Node: Error Messages20141
  813. Node: Long Example24029
  814. Node: Credits27101
  815. Node: Index27805
  816. 
  817. End Tag Table
  818.